﻿Public Class NotaCredito
    'TODO HACER PROPIEDADES

#Region "Declaraciones"
    Private cId As Integer
    Private cCodigo As Integer
    Private cImporte As Double
    Private cFarmacia As String
    Private cTipoNCId As Integer
    Private cTipoNC As String
    Private cTipoEnvioNCId As Integer
    Private cTipoEnvioNC As String
    Private cFecha As Date
    Private cAno As Integer
    Private cMes As String
    Private cObraSocialXPlan As String
    Private cPath As String
    Private cFarmaciaId As Integer
    Private cPresentacionId As Integer

#End Region

#Region "Constructores"
    Public Sub New()
        cId = -1
        cCodigo = -1
        cImporte = -1
        cFarmacia = ""
        cTipoNC = ""
        cTipoEnvioNC = ""
        cFecha = Nothing
        cTipoNCId = -1
        cTipoEnvioNCId = -1
        cObraSocialXPlan = ""
        cFarmaciaId = -1
        cAno = -1
        cMes = ""
        cPath = ""
        cPresentacionId = -1
    End Sub

    Public Sub New(ByVal pId As Integer, ByVal pCodigo As Integer, ByVal pImporte As Double, ByVal pFarmacia As String, ByVal pTipoNC As String, ByVal pTipoEnvioNC As String, ByVal pFecha As Date, ByVal pTipoNCId As Integer, ByVal pTipoEnvioNCId As Integer, ByVal pFarmaciaId As Integer, ByVal pAno As Integer, ByVal pMes As String, ByVal pObraSocialXPlan As String, ByVal pPath As String, ByVal pPresentacionId As Integer)
        cId = pId
        cCodigo = pCodigo
        cImporte = pImporte
        cFarmacia = pFarmacia
        cTipoNC = pTipoNC
        cTipoEnvioNC = pTipoEnvioNC
        cFecha = pFecha
        cTipoNCId = pTipoNCId
        cTipoEnvioNCId = pTipoEnvioNCId
        cObraSocialXPlan = pObraSocialXPlan
        cFarmaciaId = pFarmaciaId
        cAno = pAno
        cMes = pMes
        cPath = pPath
        cPresentacionId = pPresentacionId
    End Sub
#End Region

#Region "Propiedades"
    Public Property Id()
        Get
            Return cId
        End Get
        Set(ByVal value)
            cId = value
        End Set
    End Property

    Public Property Codigo()
        Get
            Return cCodigo
        End Get
        Set(ByVal value)
            cCodigo = value
        End Set
    End Property

    Public Property Importe()
        Get
            Return cImporte
        End Get
        Set(ByVal value)
            cImporte = value
        End Set
    End Property

    Public Property Farmacia()
        Get
            Return cFarmacia
        End Get
        Set(ByVal value)
            cFarmacia = value
        End Set
    End Property

    Public Property TipoNC()
        Get
            Return cTipoNC
        End Get
        Set(ByVal value)
            cTipoNC = value
        End Set
    End Property

    Public Property TipoEnvioNC()
        Get
            Return cTipoEnvioNC
        End Get
        Set(ByVal value)
            cTipoEnvioNC = value
        End Set
    End Property

    Public Property Fecha()
        Get
            Return cFecha
        End Get
        Set(ByVal value)
            cFecha = value
        End Set
    End Property

    Public Property TipoEnvioNCId()
        Get
            Return cTipoEnvioNCId
        End Get
        Set(ByVal value)
            cTipoEnvioNCId = value
        End Set
    End Property

    Public Property TipoNCId()
        Get
            Return cTipoNCId
        End Get
        Set(ByVal value)
            cTipoNCId = value
        End Set
    End Property

    Public Property Ano()
        Get
            Return cAno
        End Get
        Set(ByVal value)
            cAno = value
        End Set
    End Property

    Public Property Mes()
        Get
            Return cMes
        End Get
        Set(ByVal value)
            cMes = value
        End Set
    End Property

    Public Property FarmaciaId()
        Get
            Return cFarmaciaId
        End Get
        Set(ByVal value)
            cFarmaciaId = value
        End Set
    End Property

    Public Property ObraSocialXPlan()
        Get
            Return cObraSocialXPlan
        End Get
        Set(ByVal value)
            cObraSocialXPlan = value
        End Set
    End Property

    Public Property Path()
        Get
            Return cPath
        End Get
        Set(ByVal value)
            cPath = value
        End Set
    End Property

    Public Property PresentacionId()
        Get
            Return cPresentacionId
        End Get
        Set(ByVal value)
            cPresentacionId = value
        End Set
    End Property

#End Region
End Class
